APPENDIX A 



/* 

* (C) Copyright 2000 by OnMercial.com, Inc. 

* All rights reserved 

* General pixel encoding routine. 

* The routine ac_out is a standard range encoder. The routine UpdateModel 

* is responsible for updating the model to reflect the new probability 

* values given the color of the current pixel . 
*/ 

int Amf Coder :: encode (int a_y, int a_x) { 
/* 

* pc is the index into the color palette for the current pixel. 

* pi is the index into the color palette for the left neighbor pixel. 

* plu is the index into the color palette for the upper neighbor pixel. 

* ptr is a two-dimensional array storing the indices into the color 

* palette in the image. 
*/ 

int pc; 

int pu; 
int ptr; 

/* 

* Identify the index into the color palette for the current pixel. 
*/ 

pc={*frame) (a_x,a_y) ; 

/* 

* Assert the proposition that the index into the color palette for the 

* current pixel is a valid index (i.e., not out of bounds) . 
*/ 

assert (pc<pal_size+l) ; 

/* 

* Identify the indices into the color palette for the upper neighbor. 
*/ 

if (a_y>f rame->yO) { 

pu=(*frame) (a_x,a_y-l) ; 
} else { 

/* 

* Use the index in the color palette for the transparent color to indicate 

* that the current pixel is in the top row of the image. 
*/ 

pu=pal_size ; 

} 

/* 

* Identify the indices into the color palette for the left neighbor. 
*/ 

if (a_x>frame->xO) { 

pl=(*frame) (a_x-l,a_y) ; 
} else { 

/* 

* Use the index in the color palette for the transparent color to indicate 

* that the current pixel is in the top row of the image. 
*/ 

pl=pal_size; 

} 

/* 

* Encode the current pixel . 
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* Mode 1: The left and upper pixels have the same color. 
*/ 

if (pu==pl) { 

/* 

* Determine the proper offsets into the frq_eq array for the current 

* probability model. 
*/ 

ptr=3 *context ; 

/* 

* Mode la: The current pixel has the same color as the left and upper 

* neighbors . 
*/ 

if (pl==pc) { 

/* 

* Encode the mode and update the model. 
*/ 

coder- >ac_out (frq_eq [ptr+0] , f rq_eq [ptr+1] , f rq_eq [ptr+2] ) ; 
UpdateModel (ptr+f rq_eq, 2,0 , ALEVEL) ; 

/* 

* Select the proper model for the next pixel . 
*/ 

context=0 ; 

/* 

* Mode lb: The current pixel has a different color than the left and upper 

* neighbors . 
*/ 

} else { 

/* 

* Encode the mode and the index into the color palette for the current 

* pixel, and update the model. 
*/ 

coder- >ac_out (frq_eq [ptr+1] , f rq_eq [ptr+2] , f rq_eq [ptr+2 ] ) ; 
encode_0 (pi , pi , pc ) ; 

UpdateModel (ptr+f rq_eq, 2 , 1, ALEVEL) ; 

/* 

* Select the proper model for the next pixel. 
*/ 

context=l; 

} 

/* 

* Mode 2 : The left and upper pixels have different colors . 
*/ 

} else { 

/* 

* Determine the proper offsets into the frq_ne array for the current 

* probability model. 
*/ 

ptr=4 *context ; 

/* 

* Mode 2a: The current pixel has the same color as the left neighbor only. 
*/ 

if (pi == pc) { 

/* 

* Encode the mode and update the model . 
*/ 

coder- >ac_out (f rq_ne [ptr+0] , f rq_ne [ptr+1] , f rq_ne [ptr+3] ) ; 
UpdateModel (ptr+f rq_ne ,3,0, ALEVEL2 ) ; 

/* 

* Select the proper model for the next pixel . 
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*/ 

context=2 ; 

/* 

* Mode 2b: The current pixel has the same color as the upper neighbor 

* only . 
*/ 

} else if {pu == pc) { 

/* 

* Encode the mode and update the model . 
*/ 

coder->ac_out (f rq_ne [ptr+1] , frq_ne [ptr+2] , f rq_ne [ptr+3] ) ; 
UpdateModel {ptr+f rq_ne ,3,1, ALEVEL2 ) ; 

/* 

* Select the proper model for the next pixel . 
*/ 

context=3 ; 

/* 

* Mode 2c: The current pixel has a different color than the left and upper 

* neighbors . 

*/ 

} else { 

/* 

* Encode the mode and the index into the color palette for the current 

* pixel, and update the model. 
*/ 

coder- >ac_out {frq_ne [ptr+2] , frq_ne [ptr+3] , frq_ne [ptr+3] ) ; 
UpdateModel (ptr+f rq_ne, 3 , 2 , ALEVEL2 ) ; 
encode_0 (pl,pu,pc) ; 

/* 

* Select the proper model for the next pixel. 
*/ 

context=4 ; 

} 

} 

return 0 ; 

} 



/* 

* Encoding routine for encoding the current pixel when the current pixel 

* has a color different from both the left and upper neighbors. 
*/ 

int AmfCoder : :encode_0 (int a_l, int a_u, int a_c) { 
/* 

* xl marks the low end of the range of probability values for a color 

* in the color palette . 

* xh marks the high end of the range of probability values for a color 

* in the color palette. 

* xtot stores the total number of occurrences of each color in the 

* color palette. 
*/ 

U16B xl; 
U16B xh; 
U16B xtot; 

U16B i; 

/* 

* Initialize the low end of the range of probability values for the first 

* color in the color palette. 
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* Calculate the total number of occurrences of each color in the color 

* palette. 
*/ 

xtot=frq_0 [pal_size+l] ; 

/* 

* Exclude from the total number of occurrences of each color in the color 

* palette the number of occurrences of the colors of the left and upper 

* neighbors. 
*/ 

xtot -= f rq_0 [a_l] ; 

/* 

* Only exclude the number of occurrences of the color of the upper 

* neighbor if it is different from the color of the left neighbor (i.e., 

* we are not in mode 1) . 
*/ 

if (a_l != a_u) { 

xtot -= f rq_0 [a_u] ; 

} 

/* 

* Scan through the colors in the color palette. 
*/ 

for (i=0 ; i<pal_size+l ; i++) { 

/* 

* Ignore the colors or the left and upper neighbors . 
*/ 

if (i ==a_l I I i ==a_u) { 
continue; 

} 

/* 

* Set the high end of the range of probability values for the current 

* color to be the low end of the range of probability values for the 

* current color plus the number of occurrences of the current color. 
*/ 

xh=xl+f rq_0 [i] ; 

/* 

* If the current color is that of the current pixel, encode the current 

* color and update the model (including the number of occurrences of each 

* color in the color palette) . 
*/ 

if {i==a_c) { 

coder- >ac_out (xl , xh, xtot) ; 

UpdateModel2 (frq_0, (U16B) (pal_size+l) ,i,ALEVELO) ; 

/* 

* Break out of the for- loop. 
*/ 

break; 

} 

/* 

* Set the low end of the range of probability values for the next color to 

* be the high end of the range of probability values for the current 

* color. 
*/ 

xl=xh; 

} 

return 0 ; 

} 
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